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ABSTRACT 


The  importance  of  considering  in¬ 
dividual  machine  contribution  to  total 
mill  efficiency  is  discussed.  A  method 
for  accurately  calculating  machine 
contribution  is  introduced,  and  an  ex¬ 
ample  is  given  using  this  method.  A 
FORTRAN  computer  program  to  make 
the  necessary  complex  calculations 
automatically  is  also  presented  with 
user  instructions. 
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Introduction 

Quality  control  studies  undertaken 
at  a  sawmill  to  determine  machine  ef¬ 
ficiency  are  most  often  concerned 
with  the  relative  amount  of  variation 
developed  at  each  machine.  This 
relative  variation  is  then  a  gage  used 
to  determine  whether  or  not  the 
machine  is  performing  at  top 
efficiency 

A  factor  that  can  often  he  over¬ 
looked  m  this  process  is  the  contribu 
tion  each  machine  makes  to  overall 
mill  production  This  factor  may  at 
times  be  as  important  as  the  deter¬ 
mination  of  machine  efficiency  itself 

For  example,  when  a  machine  is 
not  operating  at  expected  efficiency, 
mill  management  has  three  alter 
natives 

(1)  The  problem  can  be  ignored 

(2)  The  machine  can  be  fixed  to  per 
form  as  expected. 

(3)  The  machine  can  be  replaced. 

The  alternative  selection  is  one 

that  should  involve  cost/benefit 
analysis.  The  estimated  increase  in 
recovery  should  be  weighed  against 
the  cost  of  action  or  inaction  with 
respect  to  the  machine.  If  the  prob¬ 
lem  is  ignored  and  no  action  taken, 
no  direct  expense  is  incurred  to  repair 
or  replace  the  machine  On  the  other 
hand,  there  is  an  indirect  cost  in¬ 
volved  :n  recovery  lost  at  the 


machine.  If  the  machine  is  repaired  or 
replaced,  there  are  immediate  direct 
costs  that  should  be  outweighed  and 
paid  for  by  increased  recovery. 

The  importance  of  consideration  of 
machine  contribution  to  total  mill  effi¬ 
ciency  can  be  illustrated  by  an  exam¬ 
ple  from  Stern3  et  al  Stern  used  com¬ 
puter  solutions  to  determine  the 
percentage  increase  in  recovery  at¬ 
tainable  when  sawing  accuracy  (de¬ 
fined  as  sawing  variation  produced  by 
the  machine  plus  oversizing)  is  im¬ 
proved.  The  particular  example  cited 
gives  the  predicted  increase  for  im¬ 
proved  sawing  accuracy  for  a 
1,000-board-foot  sample  composed  of 
one  log  from  each  1-inch*diameter 
class  of  from  5  to  20  inches. 

Assuming  that  sawing  accuracy  on 
a  machine  with  a  0.125-inch  kerf  can 
be  improved  from  0.2  to  0.1  inch,  the 
study  shows  an  increase  in  yield  of 
6.0  percent  or  60  board  feet  for  the 
sample  in  question. 

Assuming  this  increased  accuracy 
can  be  attained,  there  is  still  the 
question  whether  an  investment  made 
to  obtain  this  increase  would  be  a 
favorable  one.  Most  sawmillers  would 
probably  agree  that  a  6  percent  in¬ 
crease  in  recovery  could  easily  pay 
for  a  moderate  investment  for 
machine  repair  or  replacement.  A 
detailed  analysis  of  costs  and  returns 
should  always  replace  intuition. 


The  choice  among  alternatives  ob¬ 
tained  from  detailed  analysis, 
however,  may  change  depending  on 
whether  or  not  machine  contribution 
is  used  in  the  calculations.  If  the 
machine  is  responsible  for  90  percent 
of  mill  production,  the  increased 
recovery  for  the  mill  can  be  estimated 
at  5.4  percent  (0.90  x  6  pet),  still  a 
respectable  increase.  If  the  machine 
is  responsible  for  10  percent  of  pro¬ 
duction,  the  increase  becomes  an 
estimated  0.6  percent  (0.10  x  6  pet). 

At  this  rate  the  choice  made  on  an  in¬ 
tuitive  basis  seems  to  become  less 
clearcut.  Can  any  investment  in 
machine  improvement  be  justified  in 
this  case?  The  detailed  analysis  sug¬ 
gested  above  for  justifying  a  choice 
of  one  of  the  three  alternatives  open 
to  management  becomes  a  more  ob¬ 
vious  need  in  this  case. 

Most  mill  managers  can  probably 
provide  a  seat-of-the-pants  estimate 
of  the  contribution  to  total  mill 
recovery  made  by  each  machine  in 
their  operation.  This  estimate  may  or 
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may  not  be  an  adequate  one.  Factors 
involved  in  individual  machine  con¬ 
tribution  to  total  mill  recovery  can  be 
easily  overlooked. 

This  paper  discusses  a  method¬ 
ology  that  can  be  used  to  accurately 
calculate  individual  machine  contribu¬ 
tion  to  recovery  in  a  sawmill.  A  FOR¬ 
TRAN  computer  program  to  automati¬ 
cally  calculate  this  contribution  is 
also  presented  and  its  use  explained. 


Methodology 

Gathering  the  Data 


Figure  l.—Flow  Chart  of  Hypothetical  Sawmill 
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Development  of  percentage  factors 
representing  machine  contribution  to 
total  mill  recovery  requires  that  a  mill 
study  be  carried  out.  This  study 
documents  the  flow  of  material 
through  the  sawmill  by  collecting 
data  on  the  surface  area  and  volume 
of  lumber  produced  by  each  machine. 

To  insure  that  the  percentage  fac¬ 
tors  developed  from  the  mill  study  are 
representative  of  typical  mill  opera¬ 
tion,  the  variables  of  log  input  and 
product  output  should  be  controlled. 
That  is,  the  log  sample  used  for  the 
mill  study  should  be  representative  of 
the  log  mix  the  mill  ordinarily  pro¬ 
cesses;  the  product  output  should  be 
representative  as  well.  These  data 
should  be  collected  on  a  large 
enough  log  sample  to  insure 
reliability. 

The  real  test  of  the  adequacy  of  the 
log  sample  size  must  rest  with  the 
judgment  of  the  individual  responsi¬ 
ble  for  the  study.  This  individual 
should  be  satisfied  that  the  number 
and  mix  of  logs  selected  will  give  a 
good  representation  of  typical  mill 
operation  as  far  as  the  percentage  of 
each  product  processed  at  each 
machine  is  concerned.  As  a  rough 
guideline,  if  the  logs  are  selected  on 
a  mill  run  basis,  the  authors  suggest 
that  no  less  than  50  logs  be  used. 

This  has  proven  to  be  adequate  in  ac¬ 
tual  sawmill  studies.4  In  a  large  mill 
with  several  log  breakdown  machines, 
the  sample  should  be  larger. 

Surface  area/volume  data  are  col¬ 
lected  by  stationing  observers  with 
different  colored  spray  paints, 
crayons,  or  chalk  at  each  machine 
center.  When  a  sawn  face  that  deter¬ 
mines  a  final  dimensioning  cut  is 
made  by  that  machine  center,  the 
observer  marks  a  colored  line  across 
the  face  approximately  in  the  center 
of  the  piece.  The  following  example  il¬ 
lustrates  how  this  procedure  works. 


Suppose  a  hypothetical  mill  is  com¬ 
posed  of  the  machinery  shown  in 
figure  I.5  The  machine  codes  that  ap¬ 
pear  under  the  machine  names  in  the 
flow  chart  in  this  figure  will  be  ex¬ 
plained  in  the  section  covering  the 
computer  program. 

Color  codes  are  assigned  to  each 
machine  responsible  for  a  final 
dimensioning  cut.  In  figure  1  the 
following  codes  apply: 

Scragg  Headsaw  —  Orange 

Gang  Edger  —  Blue 

Horizontal  Band— Green 

Edger  —  Red 

When  the  study  logs  enter  the 
system,  the  observers  stationed  at 
the  various  machines  begin  marking 
the  surface  of  each  piece  on  which  a 
final  dimensioning  cut  has  been 
made. 

In  this  theoretical  mill,  the  Scragg 
Headsaw  produces  a  cant  as  shown 
in  figure  2.  Since  the  Scragg  pro¬ 
duces  a  final  dimensioning  cut  on  the 
cant,  the  observer  marks  one  of  these 
surfaces  with  an  orange  line  midway 
from  the  ends  of  the  cant  as  shown  in 
figure  2. 


Figure  2.  — Breakdown  at  the  Scragg 
Headsaw 
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The  cant  produced  on  the  Scragg 
moves  to  Gang  Edger.  Here  the 
observer  marks  one  surface  of  each 
of  the  pieces  of  lumber  sawn  from  the 
cant  with  a  blue  line  midway  from  the 
ends  of  each  of  four  pieces  as  figure 
3  indicates. 

The  two  slabs  produced  by  the 
Gang  Edger,  as  well  as  those  pro¬ 
duced  previously  by  the  Scragg  Head¬ 
saw,  move  to  the  Horizontal  Band. 
These  slabs  are  not  marked  as  yet. 
since  a  final  dimensioning  cut  has 
not  been  made  on  them  at  either  the 
Gang  Edger  or  Scragg  Headsaw.  As 
the  slabs  pass  through  the  Horizontal 


Figure  3.  — Breakdown  at  the  Gang 
Edger 

(M  149  041) 


4  Sawmill  Improvement  Program  1979  Inslruc 
tions  tor  conducting  a  sawmill  study,  pari  (l 
hardwood/random  width  option  Unpublished  in 
structions  USDA  For.  Serv..  National  Sawmill 
Improvement  Program,  State  and  Private 
Forestry  at  Forest  Products  Laboratory, 

Madison.  Wis.  p  16 
'  The  analysis  is  concerned  only  with 
machines  that  are  responsible  for  variation  m 
thickness  and  width  A  machine  is  responsible 
for  variation  in  either  thickness  or  width  when  it 
is  responsible  for  a  final  dimensioning  cut  For 
this  reason,  only  those  machines  responsible  tor 
a  final  dimensioning  cut  in  thickness  or  width 
are  shown  in  the  flow  chart  above,  trim  saws 
have  not  been  included 
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F/gure  6.— Machine  Contribution  Study  Data  Form 


Band,  the  observer  there  marks  one 
of  the  surfaces  with  a  green  line  mid¬ 
way  from  the  ends  of  the  flitch  as  in 
figure  a. 


Figure  4.— Breakdown  ai  the  Horizon¬ 
tal  Band 
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The  four  flitches  that  have  now 
been  produced  by  the  Horizontal 
Band  move  to  the  Edger  where  they 
are  cut  to  width.  Figure  5  shows  that 
the  observer  at  the  Edger  marks  one 
edge  with  a  red  line  midway  from  the 
ends  of  each  of  the  four  pieces. 

In  some  cases  such  as  railroad 
crossties  sawed  at  the  Headsaw,  all 
dimensions  are  determined  by  the 
Headsaw  so  the  two  adjacent  faces 
would  be  marked  with  the  same  color. 


Figure  5.—  Breakdown  at  the  Edger 
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As  the  lumber  marked  at  the 
various  machine  centers  moves  down 
the  green  chain,  a  final  observer 
records  the  data  necessary  to  com¬ 
pute  machine  contribution  on  the 
Machine  Contribution  Study  Data 
Form  (fig.  6).  The  data  from  this  sam¬ 
ple  log  have  been  recorded  on  this 
form  as  the  observer  would  record  it. 
The  eight  pieces  produced  are 
entered  on  the  first  eight  lines  of  the 
form.  The  remainder  of  the  form  has 
been  filled  out  with  data  from  other 
study  logs  to  complete  the  example. 

The  first  step  in  filling  in  the  data 
form  is  to  record  an  identifying  name 
of  up  to  six  characters  in  the  Iden¬ 
tifier  space.  If  more  than  one  study  is 
contemplated,  thrs  will  help  identify 
the  data  and  subsequent  computa¬ 
tions. 


A  machine  code  and  number  separ¬ 
ated  by  a  dash  are  to  be  entered  on 
line  1  of  the  data  form.  This  informa¬ 
tion  is  necessary  when  a  computer  is 
used  to  process  the  data.  Machine 
codes  and  numbers  for  this  entry  will 
be  explained  in  the  section  covering 
use  of  the  computer  program.  Enter 
the  machine  name  on  line  2.  The  col¬ 
or  to  be  entered  on  line  3  is  taken 
from  those  assigned  to  each  machine 
at  the  beginning  of  the  study. 


Each  machine  column  on  the  data 
form  has  thickness  and  width  col¬ 
umns.  If  both  faces  of  a  product  are 
produced  on  the  same  machine,  an 
entry  should  be  made  in  each  of 
columns.  If  a  product  is  pro¬ 
duced  on  two  machines,  the  ap¬ 
propriate  entry  is  made  under  the 
machine  name  responsible. 

Data  for  products  produced  to 
specified  widths  are  entered  as  the 
nominal  dimension.  For  example,  a  2 
x  4  would  have  a  2  entered  in  one  col¬ 
umn  and  a  4  in  another. 


Except  for  the  last  two  boards,  all 
lumber  on  the  data  form  are  of  speci¬ 
fied  sizes.  These  last  two  boards  are 
4/4  random  width  grade  lumber.  When 
random  width  lumber  is  produced,  the 
thickness  designation  is  entered  by 
the  quarter  system— 4/4,  5/4,  8/4,  etc. 
The  width  of  grade  lumber  is 
measured  to  the  nearest  0.1  inch  and 
entered  in  inches  on  the  data  form. 

The  different  methods  for 
designating  specified  and  random 
width  lumber  are  necessary  for  com¬ 
puter  processing  of  the  data.  Since 
random  width  lumber  possesses 
assignable  variation  in  only  one 
dimension,  it  is  processed  differently 
than  are  specified  widths  where  varia¬ 
tion  can  be  attributed  to  two  dimen¬ 
sions. 

The  Need  for  Weighting 
Factors 

Before  discussing  analysis  of  the 
data,  it  is  necessary  to  discuss  just 
what  is  being  measured.  The  gather¬ 
ing  of  surface  area/volume  data  is 
used  to  measure  the  importance  of 
variation  from  each  machine  in  the 
sawmill.  Consider  two  sample  boards 
processed  on  two  different  machines 
with  scant  sawing  variations6  of  0.075 
and  0.125  respectively.  The  first  pro¬ 
duces  a  10-  foot  2x4  and  the  second 
a  10-  foot  2  x  12.  To  simplify  the  ex¬ 
planation,  assume  that  the  pieces 
can  be  brought  to  proper  final  size  if 
planed  to  remove  only  the  scant  saw¬ 
ing  variation  and  that  any  additional 
planing  allowance  or  shrinkage  are 
not  factors. 

Consider  first  the  importance  of 
variation  in  t he  2-  inch  thickness  on 
these  boards.  The  end  view  of  two 
pieces  of  lumber  in  figure  7  shows  a 
way  of  measuring  this  importance. 

The  ALS  standard  for  nominal 
2-inch  dry  dressed  dimension  lumber 
is  1.50  inches.  In  order  for  this  lumber 
to  plane  skip-free,  added  thickness 
equal  to  0.075  and  0.125  inch  respec¬ 
tively  is  needed.  This  extra  thickness 
is  shown  as  a  rectangle  in  dashed 
lines  on  the  right  side  of  each  piece. 
(This  rectangle  has  been  exaggerated 
in  size  as  compared  to  the  size  of  the 
lumber.  Its  purpose  is  to  show  the 
relative  magnitude  of  the  differing 
variations  and  is  not  intended  to 
show  how  true  variation  appears  on  a 
piece.) 

It  can  be  seen  in  figure  7  that  the 
variation  m  the  2  inch  nominal  thick¬ 
ness  for  each  piece  occurs  on  the  ad 
jacent  face  That  is,  the  variation  for 


2x4  2x!2 


Figure  7.  — End  View  of  Two  Pieces  of 
Lumber  Illustrating  the  Importance 
of  Variation  as  Measured  by  Surface 
Area 
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the  2  x  4,  2-  inch  dimension  occurs 
over  the  surface  area  of  the  nominal 
4-  inch  face. 

It  can  be  seen  then,  that  the  impor 
tance  of  variation  in  a  given  dimen¬ 
sion  is  defined  by  the  surface  area  of 
the  adjacent  face.  Furthermore,  the 
variation  in  a  given  dimension  is 
caused  by  machinery  that  saws  the 
face  adjacent  to  that  dimension. 

The  widths  of  the  two  pieces  in  this 
example  are  3.5  and  11.25  respective¬ 
ly.  If  the  variations  of  the  two  were 
identical,  the  relative  importance  of 
the  variation  on  the  two  pieces  would 
be  a  ratio  of  1 1.25  to  3.5.  (This 
assumes  that  board  lengths  are  equal 
as  in  this  example.)  Consideration  of 
the  relative  importance  of  the  varia¬ 
tions  in  the  2-  inch  dimension  alone, 
without  consideration  of  the  surface 
area  over  which  this  variation  occurs, 
gives  a  ratio  of  1  66667  (0.125  *  0  075 
=  166667). 


Using  the  actual  variation  figures 
from  the  example,  it  can  be 
calculated  that  the  importance  of  the 
variation  on  the  2  x  12  is  much  farger. 
The  importance  is  equal  to  the  ratios 
of  the  two  rectangular  solids  defined 
by  the  actual  widths  of  the  lumber, 
the  amount  of  variation  in  the  2-  inch 
dimension  and  the  lumber  lengths. 
Since  lengths  are  the  same  in  this 
case,  the  relative  importance  can  be 
calculated  without  its  inclusion  as 
follows: 

2x4 

3.5  x  0.075  =  0.26250 
2x12 

11.25  x  0.125  =  1.40625 

The  relative  importance  of  the 
variation  on  the  2  x  12  as  compared 
to  that  on  the  2x4  then  becomes 
1.40625  -s-  0.26250  =  5.35714.  Con¬ 
sideration  of  surface  area  rather  than 
variation  alone  leads  to  an  increased 
estimate  of  the  relative  importance  of 
the  variation  on  the  2  x  12  of  our  ex¬ 
ample  from  1.66667  (variation  alone) 
to  5.35714  (surface  area  considered) 
This  illustrates  the  need  to  include 
surface  area  in  the  calculations. 

The  same  calculations  can  be 
made  to  ascertain  the  importance  of 
variation  and  surface  area  on  the 
4-and  12-  inch  dimensions  of  the  ex¬ 
ample  lumber. 

A  weighting  factor,  in  addition  to 
surface  area,  is  needed  to  calculate 
machine  contribution.  This  is  a 
volume  factor  and  is  calculated  from 
the  same  data  used  to  obtain  surface 
area  from  the  study  data  form. 

This  factor  is  needed  because  the 
surface  area  calculation  gives  only  a 
relative  measure  of  the  importance  of 
variation  on  a  dimension  processed 
at  a  single  machine.  To  derive  the  im¬ 
portance  to  total  mill  production,  the 
volume  of  the  product  on  which  the 
variation  occurs  must  be  considered 

For  example,  it  may  be  determined 
from  the  surface  area  calculations 
that  Machine  A  is  responsible  for  90 
percent  of  the  variation  and  Machine 
B  for  10  percent  of  the  variation  in 
the  2-inch  dimension  of  the  2  x  12’s 
produced  at  a  mill. 


6Scant  sawina  variation  is  the  variation  on  the 
negative  side  or  the  board  measurement  data 
distribution  This  value  Is  the  distance  irom  the 
average  board  thickness  to  an  appropriate  pro 
babillty  <1  -«»>  level  in  the  left  tall  ol  the  distribu 
tion  This  value  Is  the  amount  ol  extra  thickness 
needed  on  a  piece  of  lumber  to  allow  skips  on  <> 
percent  of  the  lumber  processed 
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If  2  percent  of  the  mill’s  volume 
production  is  2  x  12’s,  the  importance 
of  the  variation  on  the  2-inch  dimen¬ 
sion  of  the  2  x  12  on  Machine  A 
relative  to  total  mil!  production  will  be 
0.90  x  0.02  =  0.018;  or  on  Machine  B 
will  be  0.10  x  0.02  =  0.002. 

In  order  to  obtain  meaningful 
figures  from  the  tally  on  the  data 
form,  each  product  must  be  identified 
so  that  its  volume  factor  and  resul¬ 
tant  importance  to  variation  contribu¬ 
tion  can  be  calculated.  In  the 
preceding  example,  2  x  12’s  must  be 
identified  as  a  product,  the  volume 
produced  determined,  and  the  volume 
factor  calculated.  This  factor  is  then 
multiplied  by  the  surface  area 
calculation  for  each  dimension  of 
each  product.  That  is,  both  the  2-  and 
12-inch  dimensions  of  a  2  x  12  con¬ 
tain  variation.  The  percent  of  each 
dimension  produced  on  each  machine 
must  be  known. 

In  the  example,  the  calculations 
made  addressed  the  2-inch  dimension 
of  the  2  x  12’s.  This  will  be  denoted 
throughout  the  remainder  of  the 
paper  as  simply  2x12-2.  The  varia¬ 
tion  in  the  nominal  12-  inch  dimen¬ 
sion  of  the  2x12  would  be 
designated  as  2  x  12  -12  and  the  sur¬ 
face  area  and  volume  calculations  ap¬ 
plied  as  in  the  example  for  the 
nominal  2-inch  dimension. 

Returning  to  the  sample  data  in 
figure  6,  it  can  be  seen  that  the  pur¬ 
pose  is  to  obtain  information  to 
calculate  both  a  surface  area  factor 
and  volume  factor.  Multiplied 
together,  these  give  a  measure  of  the 
relative  importance  of  the  variation 
found  on  each  dimension  of  each  pro¬ 
duct  produced.  The  methods  to  calcu¬ 
late  the  surface  area  and  volume  fac¬ 
tors  follow. 


Calculating  the  Surface 
Area  Factor 

An  example  of  calculating  the  sur¬ 
face  area  factor  for  the  data  recorded 
on  the  field  form  in  figure  6  will  be 
shown.  In  order  to  more  easily 
calculate  the  surface  area  for  each 
dimension  as  is  necessary,  it  is 
helpful  to  summarize  the  data  on  sur¬ 
face  area  by  product  first  (1  x  4,  2  x  8, 
etc.).  The  surface  area  calculations 
for  each  dimension  (1  x  4  -  1,  1  x  4  -  2, 
2  x  8  ^  2t  2  x  B  -  8f  etc.)  of  the  product 
summarized  are  then  made  separate¬ 
ly.  In  the  example,  the  summary  of 
surface  area  for  2  x  8's  is  given  first. 
Remember  that  the  machine  which 


produced  the  surface  area  of  a  given 
face  is  responsible  for  the  dimen¬ 
sional  variation  of  the  adjoining  face. 

For  the  sample  data  this  means 
that  the  variation  in  the  8-inch  dimen¬ 
sion  of  the  2  x  8’s  is  caused  by  the 
Scragg  or  Edger.  The  surface  area  of 
the  2-inch  face  produced  by  the 
Scragg  or  Edger  gives  a  measure  of 
the  importance  of  the  variation  found 
in  the  8-inch  dimension. 

To  help  reduce  the  confusion  possi¬ 
ble  here,  the  machine  responsible  for 
the  variation  in  a  given  dimension  is 
listed  in  parentheses  above  it  in  the 
summary  of  surface  area  table.  This 
can  then  be  read  to  mean  that  the 
variation  produced  by  the  Scragg,  in 
parentheses,  ir,  the  8-inch  dimension 
is  measured  by  the  surface  area  of 
the  2-inch  faces  listed  under  the 
Scragg,  not  in  parentheses. 

As  an  example  of  calculating  the 
surface  area  factor  for  one  dimen¬ 


sion,  look  at  the  first  four  boards  in 
the  summary  of  surface  area  for  2  x 
8's.  It  can  be  seen  that  the  variation 
in  the  nominal  8-inch  dimension  was 
caused  by  the  Scragg  since  this  ap¬ 
pears  in  parentheses.  These  four 
pieces  are  the  total  production  of  2  x 
8  -  8’s  manufactured  by  the  Scragg. 
The  surface  area  of  the  2-inch  face 
(length  x  width  or  2  x  10  =  20),  under 
the  Scragg  heading  without  paren¬ 
theses,  is  summed  (20  +  20  +  20  + 
20  =  80)  to  obtain  the  measure  of 
surface  area  to  attribute  to  the  varia¬ 
tion  in  the  nominal  8-inch  dimension. 

The  percentage  that  this  surface 
area,  for  2  x  8  -  8's  manufactured  on 
the  Scragg,  represents  as  a  percent 
of  the  total  surface  area  of  2  x  8’s 
(680)  is  calculated  (80  ^  680  =  0.12) 
to  give  the  surface  area  factor.  The 
surface  area  factor  is  calculated  in 
this  way  for  each  dimension  of  each 
product  tallied  as  follows. 


Scragg 

(Gang) 

2 

2 

2 

2 


2  x  8  -  Summary  of  Surface  Area 
Gang  Horizontal  Band  Edger 

(Scragg) 

8 

8 

8 

8 


(Edger) 

8 

8 


(Gang) 

2 

2 


Length 


10 

10 

10 

10 


14 

14 


2x8-  Total  Surface  Area  Calculation 
2x8-8 

Scragg  =  (2  x  10)  +  (2  x  10)  +  (2  x  10)  +  (2  x  10) 
Edger  =  (2x14)  +  (2x14) 

2x8-2 

Gang  =  (8  x  10)  +  (8x  10)  +  (8  x  10)  +  (8  x  10) 
+  (8x  14)  +  (8x  14) 


=  80 
=  56 

=  544 
Total  =  680 


2x8-  Surface  Area  Factor  Calculation 
2x8-8 

Scragg  =  80/680  =  0.12 
Edger  =  56/680  =  .08 

2x8-2 

Gang  =  544/680  =  0.80 


2x6-  Summary  of  Surface  Area 


Scragg  Gang  Horizontal  Band  Edger  Length 

(Edger)  ( Horizontal  Band) 

6  2  8 

6  2  8 

(Gang)  (Scragg) 

2  6  10 

2  6  10 

2  6  10 

2  6  10 

2x6-  Total  Surface  Area  Calculation 
2x6-6 

Edger  =  (2  x  8)  +  (2  x  8)  =32 

Scragg  =  (2  x  10)  +  (2  x  10)  +  (2  x  10)  +  (2  x  10)  =  80 

2x6-2 

H.  Band  =  (6x8)  +  (6x8)  =  96 

Gang  =  (6  x  10)  +  (6  x  10)  +  (6  x  10)  +  (6  x  10)  =  240 


Total  =  448 

2  x  6  -  Surface  Area  Factor  Calculation 
2x6-6 

Edger  =  32/448  =  0.07 
Scragg  =  80/448  =  .18 

2x6-2 

H.  Band  =  96/448  =  0.21 
Gang  =  240/448  =  .54 


2  x  4  -  Summary  of  Surface  Area 


Scragg 

Gang 

Horizontal  Band 

Edger 

Length 

(Gang) 

(Scragg) 

2 

4 

14 

2 

4 

(Edger) 

(Horizontal  Band) 

8 

4 

2 

12 

4 

2 

12 

2  x  4  -  Total  Surface  Area  Calculation 


2x4-4 

Scragg  =  (2  x  14)  +  (2  x  8)  =44 

Edger  =  <2x  12)  +  (2x  12)  =  48 

2x4-2 

Gang  =  (4  x  14)  +  (4  x  8)  =88 

H.  Band  =  (4  x  12)  +  (4  x  12)  =  96 


Total  =  276 


2x4-  Surface  Area  Factor  Calculation 
2x4-4 

Scragg  —  44/276  =  0.16 
Edger  =  48/276  =  .17 

2x4-2 

Gang  =  88/276  =  0.32 
H.  Band  =  96/276  =  .35 


1x4-  Summary  of  Surface  Area 


Scragg  Gang  Horizontal  Band 

Edgar 

Length 

(Edger) 

(Horizontal  Band) 

4 

1 

6 

4 

1 

8 

4 

1 

8 

4 

1 

6 

4 

1 

8 

4 

1 

14 

4 

1x4-  Total  Surface  Area  Calculation 

1x4-4 

1 

14 

Edger  =  (1  x  6)  +  (1  x  8)  +  (1  x  8)  +  (1 
+  (1  x  14)  +  (1  x  14) 

1x4-1 

x  6)  + 

(1  x8) 

=  64 

H.  Band  =  (4  x  6)  +  (4  x  8)  +  (4  x  8)  + 
+  (4  x  14)  +  (4x  14) 

1  x  4  *  Surface  Area  Factor  Calculation 

1x4*4 

Edger  =  64/320  =  0.20 

1x4*1 

H.  Band  =  256/320  =  0.80 

|4  x  6) 

+  (4x8) 

=  256 

Total  =  320 

4/4  •  Summary  of  Surface  Area 

Scragg  Gang  Horizontal  Band 

Edger 

Length 

(Edger) 

(Horizontal  Band) 

9.6 

4/4 

10 

8.7 

4/4  -  Total  Surface  Area  Calculation 

4/4 

4/4 

10 

H.  Band  =  (10x9.6)  +  (10x8.7) 

4/4  •  Surface  Area  Factor  Calculation 

=  183 

Total  =  183 

4/4 

H.  Band  =  183/183  =  1.00 
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Table  1.— Calculating  the  volume  factor 


Product 

Tally 

Volume  factor 

Fbm 

1  x  4 

21.33 

21.33/213  92  =  0.0997 

2x4 

30.67 

30.67/213.92  =  .1434 

2x6 

56.00 

56.00/213.92  =  .2618 

2x8 

9067 

90.67f2l3.92  =  .4239 

4/4 

15.25 

15.25/213.92  =  .0713 

Total 

213.92 

1.00 

Table  2. —Calculating  percent  contribution 


Product 

Machine 

Surface 

area 

factor 

Y  Volume  _ 

A  factor 

Percent 

contribution 

1x4- 

4 

Edger 

0.20 

0  0997 

0.0199 

or 

1.99 

1x4- 

1 

H.  Band 

.80 

.0997 

.0798 

or 

7.98 

2x4- 

4 

Scragg 

.16 

.1434 

.0229 

or 

2.29 

2x4- 

4 

Edger 

.1434 

.0244 

or 

2.44 

2x4 

2 

Gang 

.<2 

.1434 

.0459 

or 

4.59 

2x4- 

2 

H.  Band 

.35 

.1434 

.0502 

or 

5.02 

2x6- 

6 

Edger 

.07 

.2618 

.0183 

or 

1.83 

2x6- 

6 

Scragg 

.18 

.2618 

.0471 

or 

4.71 

2x6- 

2 

H.  Band 

.21 

.2618 

.0550 

or 

5.50 

2x6- 

2 

Gang 

.54 

.2618 

.1414 

or 

14.14 

2x8- 

8 

Scragg 

.12 

.4239 

.0509 

or 

5.09 

2x8- 

8 

Edger 

.08 

.4239 

.0339 

or 

3.39 

2x8- 

2 

Gang 

.80 

.4239 

.3391 

or 

33.91 

4/4 

H.  Band 

1.00 

.0713 

.0713 

or 

_7.13 

Total 

=  100.00 

— 

- .  — — — 

—  — . — - — _  — 

■  -  -  ----  - - 

--  -  - — — - -  - 

—  __ 

- 

Calculating  the  Volume 
Factor 

The  volume  factor  is  calculated  by 
first  determining  the  total  board  foot 
tally  from  the  lumber  on  the  data 
sheet.  A  tally  for  each  product  and 
the  percent  of  the  total  that  each 
represents  is  calculated.  Table  1  il¬ 
lustrates  this  procedure. 

Calculating  Percent 
Contribution 

Percent  contribution  can  now  be 
calculated  by  multiplying  the  surface 
area  factor  times  the  volume  factor. 
This  multiplication  and  conversion  to 
percent  is  shown  in  table  2. 

Percent  contribution  by  machine 
center  can  now  be  summarized  from 
table  2  by  summing  the  individual  per¬ 
cent  contributions  for  each  product 
for  each  machine.  Since  this  sum¬ 
mary  would  be  identical7  to  the  sum¬ 
mary  given  by  the  computer  output  in 
figure  8,  it  will  not  be  repeated  here. 


The  Computer  Program 


Hand  computation  has  given  the 
percentage  factors  for  the  example 
data.  This  calculation  is  rather 
tedious  even  for  a  small  amount  of 
data.  If  a  large  oample  of  logs  is  be¬ 
ing  run,  use  of  the  computer  program 
will  save  much  computation  time. 

Figure  8  shows  an  example  of  out¬ 
put  from  the  computer  program  to 
calculate  machine  contribution.  The 
program  was  run  using  the  same 
sample  data  used  for  the  hand 
calculations,  with  the  answer  iden¬ 
tical  except  for  rounding  error. 

Data  are  entered  into  the  program 
via  two  types  of  data  cards,  a  header 
card  followed  by  cards  holding  study 
data. 

Figure  9  shows  the  formatting  of 
the  header  card  used  to  run  the  sam¬ 
ple  data.  This  card  contains  only  four 
machines,  although  up  to  six  are 
allowed  by  the  program. 


The  first  six  columns  of  the  header 
card  allow  the  study  identifier  to  be 
entered.  Columns  8  to  11  allow  the 
entry  of  a  sequence  number  of  1  to 
9,999.  This  sequence  number  is  re¬ 
ferred  to  by  error  messages  in  the 
program  and  should  be  used.  There 
are  six  fields  for  machine  identifica¬ 
tion.  These  are  located  in  columns  17 
to  20,  23  to  26.  29  to  32.  35  to  38.  41 
to  44,  and  47  to  50. 

The  first  two  columns  of  each 
machine  identification  field  hold  the 
machine  code.  This  code  allows  the 
designation  of  a  machine  name 
without  writing  it  out  completely.  The 
code  references  a  list  of  machines  in 
the  program.  This  list  contains  most 
names  it  is  thought  will  be  en¬ 
countered  in  a  sawmill.  The  list 
shown  in  Appendix  I  currently  con¬ 
tains  22  names  and  the  array  holding 


*  Due  to  rounding  errors,  the  values  arrived  at 
by  hand  computation  differ  somewhat  from 
those  by  computer  calculation 
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SAMPLE  MAC*’ Nr  CONTRIBUTION  STUDY 


PRODUCT  PRODUCED  PERCE M  mILL  VOLUME 


1  X  9  9.97 

2  x  0  19.50 

2  X  b  2b  .  1  * 

2  X  8  92.38 

0/0  7.13 

100.00  % 

maChimF:  2-SAh  sChagg 

DIMENSION  PRODUCED  PFPCENt  3 1  •  P  F  A  C  P  AREA  PERCENT 

CONTRIBUTION 

?  x  a  -  a 

15.98 

2.29 

2  X  b  -  b 

17.8b 

9.67 

2X8-8 

)  1  .  7b 

a.  99 

TOT  a  i  machine  CONTRIBUTION 

11.95  X 

MACHINE:  gang  EDGE « ( S I NGL E  ARBOR ) 

DIMENSION  PRODUCED 

PERCENT  SURFACE  AREA  PERCENT 

contpibut ion 

2  x  a  -  a 

3  1  .88 

9.57 

2  x  6  -  2 

53.57 

14.02 

2X8-? 

80.00 

33.91 

total  MACHINE  CONTRIBUTION 

52.50  X 

machine:  HORIZONTAL  BAND 

DIMENSION  PRODUCED 

PERCENT  SURFACE  AREA  PERCENT 

CONTRIBUTION 

1X8-1 

8  0.00 

7.98 

2x4-? 

34.78 

9.99 

2  X  b  -  2 

21.83 

5  .  b  1 

a/a 

loo.oo 

7.13 

TOTAL  MACHINE  CONTRIBUTION 

25.70  X 

MACHINE  :  2  OR  3  SA  ;  EDGE » 

DIMENSION  PRODUCED 

PERCENT  SURFACE  AREA  PERCENT 

contribution 

l  x  8  -  a 

20.00 

1 .99 

2  X  8  -  « 

17.39 

2.49 

2  X  b  -  b 

7.18 

1.87 

2X8-8 

8.29 

3.49 

TOTAL  MACHINE  CONTRIBUTION 

9.85  3 

Figure  8  — Computer  Output 
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the  names  will  allow  up  to  100.  If  a 
name  is  not  in  the  list,  it  can  easily 
be  added  to  the  program’s  array.  To 
enter  the  machine  code,  locate  the 
machine  name  in  the  machine  code 
list  and  select  the  proper  code. 

A  dash  separates  the  machine  code 
entered  in  the  first  two  columns  of 
each  four-column  machine  identifica¬ 
tion  field  from  a  machine  number 
entered  in  the  last  column  of  the 
field.  The  purpose  of  the  number  is  to 
identify  a  machine  if  two  machines  in 
a  mill  should  happen  to  have  the 
same  name.  If  a  flow  chart  of  the  mill 
operation,  as  shown  in  figure  1,  is 
made  as  it  probably  should  be  for 
every  mill  study,  it  is  easy  to 
reference  the  exact  machine  in  the 
mill  that  the  program  output 
references.  The  machine  code  and 
number  identifying  each  machine  are 
shown  in  figure  1. 

The  purpose  of  the  header  card  is 
to  identify  the  surface  area/volume 
data  to  follow  on  the  study  data 
cards  as  to  machine  responsibility. 
The  format  for  the  cards  holding  the 
sample  surface  area/volume  data  is 
shown  in  figure  10.  The  fields  on 
these  cards  are  set  up  as  they  appear 
on  the  data  form.  Each  of  six  possible 
machines  can  contain  data  for  both 
thickness  and  width.  That  is,  since 
each  machine  is  capable  of  producing 
both  thickness  and  width,  a  field  is 
available  for  each.  The  method  of  en¬ 
try  for  each  machine  is  the  same,  and 
the  column  locations  are  shown  in 
figure  10. 

The  entry  of  the  data  on  the  sur¬ 
face  area/volume  data  cards  is 
straightforward.  The  data  taken  from 
the  data  form  are  entered  right- 
justified  in  the  appropriate  machine 
fields  on  the  cards. 

An  alphabetized  definition  of  pro¬ 
gram  variables  is  given  in  Appendix  II, 
and  the  program  listing  is  given  in  Ap¬ 
pendix  III. 
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Figure  9.— Format  of  Header  Card 
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APPENDIX  I— 
Machine  Code  List 


Code 


01 

Band  Headrig 

09 

Quad  Band/Slab  Chipper 

52 

Band  Linebar 

02 

Circular  Headrig 

10 

Sash  Gang  (Log) 

53 

Circular  Linebar 

03 

Circular  Headrig/Vertical  Edger 

11 

2-Saw  Scragg 

54 

Horizontal  Band 

04 

Band  Headrig/Slab  Chipper 

12 

4-Saw  Scragg 

55 

Horizontal  Circular 

05 

Circular  Headrig/Slab  Chipper 

13 

Chipper  Canter 

56 

Sash  Gang 

06 

Twin  Band 

57 

Vertical  Band  Splitter 

07 

Quad  Band 

50 

Gang  Edger  (Single  Arbor) 

58 

2  or  3  Saw  Edger 

08 

Twin  Band/Slab  Chipper 

51 

Gang  Edger  (Double  Arbor) 

APPENDIX  II— 

Alphabetized  Definition 
of  Program  Variables 

PROGRAM  VARIABLES 

VARIABLE  types 

A  s  ALPHANUMERIC 
I  =  INTEGER 
R  =  REAL 

VARIABLE  TYPE  DEFINITION 


CHAR(2,b)  A  A  SPACE  ('  •).  SLASH  ('/•)#  DECIMAL  POINT  ('.•), 

OR  ONE  Cl').  DETERMINES  WHETHER  THE  proouct  being 
PROCESSED  IS  RANDOM  WIDTH  OR  SPECIFIED  DIMENSION. 
FOUND  ON  EACH  DATA  CARO  IN  COLUMNS  20&25 , 30*55  *  # 

S0*55»60A6S#AND  70&75. 

Char ( a .8 ) t 

A  s  COLUMN  IN  WHICH  THE  DIMENSION  OR  THE  SURFACE  AREA 
OF  EACH  PROOUCT  IS  FOUNO. 

B  z  MACHINE  NUMBER. 

CNTRI8  R  PERCENT  CONTRIBUTION  OF  EACH  DIMENSION  FOR  EACH 

MACHINE. 

ERROR  SUBROUTINE  USED  TO  PRINT  OUT  ERROR  MESSAGES. 

I  I  COUNTER  FOR  00  LOOPS. 

II  I  COUNTER  FOR  THE  NUMBER  OF  OATA  CAROS  RE AO  IN.  TH£ 

PROGRAM  IS  CURRENTLY  SET  AT  A  MAXIMUM  OF  1000  DATA 
CARDS. 

IP  I  MOLDS  ONE  OF  THE  SPECIFIED  NOMINAL  DIMENSIONS  FOR  A 

SINGLE  PROOUCT.  "JP"  HOLOS  THE  OTHER. 

1SAV  I  USEO  TO  PRINT  OUT  ONE  NOMINAL  DIMENSION  FOR  SPECIFIEO 

OIMENSION  LUMBER.  " JSAV"  PRINTS  the  other. 

J  I  COUNTER  FOR  DO  LOOPS. 

JP  I  MOLDS  ONE  OF  THE  SPECIFIED  NOMINAL  DIMENSIONS  FOR  A 

SINGLE  PROOUCT.  "IP"  HOLDS  THE  OTHER. 

I  USEO  TO  PRINT  OUT  ONE  NOMINAL  DIMENSION  FOR  SPECIFIEO 
DIMENSION  LUMBER.  "ISAV"  PRINTS  THE  OTHER. 


JSAV 


K  l 
KM  I 
LENGTH  I 
mAChIn(2,2,6)  I 


MCODE(b)  I 


My  l 

MN  I 

HP  J 

MSKIP  I 

MS  U«  t 

Ml  1 

M2  1 

N  I 

NBLANK(6)  I 


NC0DE(6)  I 


NSEQ  I 

NT  I 
NWID  I 
PCTRVMC  20)  R 


PCTSVMJ18, lb)  0 


RAREA(6,20)  R 

RM  I 

RHSUM(20)  R 

RP  I 


COUNTER  FOR  DO  LOOPS. 

MACHINE  NUMBER  (1-6). 

BOARD  LENGTH. 

ARRAY  USED  TO  STORE  SURFACE  ARE*  INFORMATION  FROM  EACH 
OATA  CARO  AS  IT  IS  REAO. 

MACHIN(A,B,C) * 

A  *  THE  DIMENSION  OR  THE  SURFACE. AREA  BEING  PROCESSED. 
B  s  ONE  OF  THE  TWO  COLUMNS  ASSIGNEO  TO  EACH  MACHINE 
HOLOING  OIMENSION  OR  SURFACE  AREA  INFORMATION. 

C  s  MACHINE  NUMBER. 

MACHINE  CODE  INDICATING  MACHINE  TYPE.  FOUND  ON  THE 
HEADER  CARD  IN  COLUMNS*  1 6- 1 8, 22-2R , 28-30, 3B-36 , a0-«2, 

«6-U0. 

mcooE(A): 

A  s  MACHINE  NUMBER. 

COUNTER  FOR  THE  MACHINE  NUMBER. 

COUNTER  FOR  the  machine  number, 
counter  FOR  00  LOOP. 

INTEGER  VALUE  EQUAL  TO  SPCT. 

INTEGER  VALUE  EQUAL  TO  SMSUM  OR  RmSUM. 

MACHINE  NUMBER  (1-6)  CORRESPONDING  to  THE  FIRST  PIECE 
OF  SURFACE  AREA  OR  DIMENSION  DATA  ON  A  SINGLE  DATA 
CARD. 

MACHINE  NUMBER  (1-6)  CORRESPONDING  TO  THE  SECOND  PIECE 
OF  SURFACE  AREA  OR  DIMENSION  DATA  ON  A  SINGLE  DATA 
CARD. 

COUNTER  FOP  DO  LOOP. 

CHARACTER  FALLING  BETWEEN  THE  MACHINE  CODE  "MCOOE*  AND 
THE  MILL  SEQUENCE  NUMBER  "NCOOE"  ON  THE  HEADER  CARO. 
MUST  BE  EITHER  A  SPACE  OR  A  DASH. 

NBLANK(A)* 

A  r  MACHINE  NUMBER. 

SEQUENCE  NUMBER  FOR  EACH  MACHINE  FROM  FLOW  CHART  OF 
MILL.  FOUND  ON  THE  HEADER  CARD  IN  COLUMNS*  20,26,32, 
38,00, SO. 

NCOOE (A)* 

A  a  MACHINE  NUMBER. 

SEOUENCE  NUMBER  OF  THE  DATA  CARDS.  USEO  FOR  ERROR 
CHECKING.  FOUND  IN  COLUMNS  8-1 1  ON  EACH  CARO. 

USED  AS  A  FLAG  IN  A  DO  LOOP. 

INTEGER  USED  TO  CHECK  THE  WIDTH  VALUE. 

PERCENT  OF  MILL'S  VOLUME  MADE  UP  BY  EACH  RANDOM  WIDTH 
PRODUCT. 

RCTRVM(A)| 

A  a  THICKNESS  OF  RANDOM  WIDTH  PRODUCT. 

PERCENT  OF  MILL'S  VOLUME  MADE  UP  BY  EACH  SPECIFIED 
DIMENSION  PRODUCT. 

PCTSVM(A,B)I 

ABB  *  THE  SPECIFIED  NOMINAL  DIMENSIONS. 

10TAL  SURFACE  AREA  OF  EACH  RANDOM  WlOTH  PRODUCT  FOR 
EACH  INDIVIDUAL  MACHINE. 

RARE  A ( A , B) t 
A  a  MACHINE  NUMBER. 

B  »  THICKNESS  OF  RANDOM  WIDTH  PRODUCT. 

COUNTER  FOR  THE  MACHINE  NUMBER. 

TOTAL  SURFACE  AREA  OF  ALL  RANDOM  WIDTH  PRODUCTS. 

RMSUM ( A ) I 

A  a  THICKNESS  OF  RANDOM  WIDTH  PRODUCT, 

THICKNESS  OF  RANDOM  WIDTH  PRODUCT. 
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MttMfaHiiiMiMHailii 


RP CT (6,20) 


R 


RSKIP{ft)  I 

RVOLl*M  (?P  )  R 

SARE  A(t>,  18,  J8)» 


SAWS(S.IOO)  A 

SM5UM(10,|8)  R 

SPCT (6, 16, 18)  R 


SP1  I 
SP2  I 
SSKlP(b)  1 

STUPY13)  A 


SvOLUMf 18, 18)  R 


TOTCTB  R 
TOTPCT  » 
T01V0L  R 
TYPE  I 
WIDTH  R 
XMCHNS ( 15  )  * 


PERCENT  OF  EACH  RANDOM  WIDTH  PRODUCT  PRODUCED  ON  EACH 
INDIVIDUAL  MACHINE. 

RPCT  f  A , B  )  t 
A  *  MACHINE  NUMBER. 

8  s  THICKNESS  OF  RANDOM  WIDTH  PRODUCT. 

FLAG  VARIABLE  EQUAL  TO  ONE  WHEN  RANDOM  MIOTH  PRODUCT 
BEING  PROCESSED. 

BSK I P ( A  )  1 

A  s  MACHINE  NUMBER. 

TOTAL  VOLUME  OF  EACH  RANDOM  WIDTH  PRODUCT. 

RVOLUM(A)  : 

A  s  THICKNESS  OF  RANDOM  WIOTH  PRODUCT. 

TOTAL  SURFACE  AREA  OF  EACH  SPECIFIED  DIMENSION  PRODUCT 
FOR  EACH  INDIVIDUAL  MACHINE. 

SAREA(A,B,C)i 
A  e  MACHINE  NUMBER. 

B&C  s  THE  SPECIFIED  NOMINAL  DIMENSIONS. 

STORES  THE  NAMES  OF  THE  MACHINES. 

SAkS( A,B)  : 

a  s  NUMBER  (5)  OF  SIX  CHARACTER  ALPHA  FIELDS. 

B  r  machine  CODE  "MCODE". 

TOTAL  SURFACE  AREA  OF  ALL  SPECIFIED  DIMENSION  PRODUCTS. 

Sm$um ( a , b  ) : 

A wp  s  THE  SPECIFIED  NOMINAL  DIMENSIONS. 

PERCENT  OF  EACH  SPECIFIED  DIMENSION  PRODUCED  ON  EACH 
INDIVIDUAL  MACHINE. 

SPCT(A,B,C):  1 

A  s  MACHINE  NUMBER. 

P AC  =  THE  SPECIFIED  NOMINAL  DIMENSIONS. 

HOLDS  ONE  OF  THE  SPECIFIED  NOMINAL  DIMENSIONS  FOR  A 
SINGLF  PRODUCT.  *SP?"  HOLDS  THE  OTHER. 

HOLDS  ONE  OF  THE  SPECIFIED  NOHINAL  DIMENSIONS  FOR  A 
SINGLE  PRODUCT.  "SP1"  HOLDS  THE  OTHER. 

FLAG  VAR1APLE  EQUAL  TO  ONE  WHEN  SPECIFIED  OIMENSION 
IS  BEING  PROCESSED. 

SSKlP(A): 

A  =  MACHINE  number. 

STUDY  IDENTIFIER  FOUND  IN  COLUMNS  1-6  OF  EACH  DATA 
CARO. 

STUDYCA): 

A  =  NUMBER  (3)  OF  TwO  CHARACTER  ALPHA  FIELOS. 

TOTAL  VOLUME  OF  EACH  SPECIFIED  DIMENSION  PROOUCT. 

$V0LUM(A,B) : 

A*e  s  THE  SPECIFIED  NOMJNAL  DIMENSIONS. 

TOTAL  PERCENT  CONTRIBUTION  OF  EACH  MACHINE. 

TOTAL  PERCENT  BY  VOLUME  OF  ALL  PRODUCTS  PRODUCED. 

TOTAL  VOLUME  OF  ALL  PRODUCTS  PROOUCED. 

REFERENCES  ERROR  MESSAGE  TO  BE  PRINTED. 

THE  RANDOM  WIDTH  BEING  PROCESSED. 

USED  TO  DETERMINE  IF  MORE  THAN  SIX  MACHINES  ARE  BEING 
READ  FROM  THE  HEADER  CARD. 

XMCHNS (A ) : 

A  *  NUMBER  (15)  OF  TWO  CHARACTER  ALPHA  FIELDS. 
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APPENDIX  III— 
Program  Listing 


1  DIMENSION  CHAR(2,6),maCMIN(2,2,6),mC0DE  (6)  ,NBLANM6)  .NCODE  (6) , 

2  I  PCTSVM(16,18),PCTRVM(20),RAREA(fc,20),RMSUM(20),RPCT(6,20), 

3  2  R$KIP(6),RVOLUM(20),SAREA (6, 18, 16),SAWS(5, 100),SMSUM( 16, 16), 

•  5  SPCT(6,18,18),SSKIP(6),STUDV(3),SV0LUM(ie,IB),XMCHN3(lS) 

5  INTEGER  RM,RP,R$KIP,SP1 ,5P2,SSKIP 

6  C  *****  THE  FOLLOWING  DATA  STATEMENT  USES  ***** 

7  C  *****  AN  •  A6"  FORMAT.  YOUR  COMPUTER  MAY  ***** 

8  C  *****  NOT  ALLOW  THIS.  ALL  OTHER  ALPHA-  ***** 

9  C  *****  NUMERIC  FORMATS  IN  THIS  PROGRAh  ***** 

10  C  ««•««  ARE  EITHER  "A4*  OR  *A2*.  ***** 

It  DATA  ((SAWS(I,J),1»1,5),J«1,13)/'BAND  HEAORIG  ', 

12  I  'CIRCULAR  MEADRIG  CIRCULAR  HE ADRIG/VERT .EOGER  ', 

13  2  'BAND  HEADRIG/5LAB  CHIPPER  CIRCULAR  HEADRIG/SLAB  CHIPPER', 

1*  3  'TWIN  BAND  QUAD  BAND 

15  •  'TWIN  BAND/SLAB  CHIPPER  QUAO  BAN0/3LAB  CHIPPER 

16  5  'SASH  GANG(LOG)  2-S Am  SCRAGG  ', 

17  6  '4-SAW  SCRAGG  CHIPPER  CANTER 

18  C  *****  SECONO  HALT  OF  ARRAY  •••«• 

10  DATA  ((SAW$(1,J),I«I,5), J*50,S6)/'GANG  E0GER(S1NGLE  ARBOR) 

20  1  'GANG  EDGERIDOUBLE  ARBOR)  BAND  L 1 NEBAR 

21  2  'CIRCULAR  LINEBAR  HORIZONTAL  BAND 

22  3  'HORIZONTAL  CIRCULAR  SASH  GANG 

23  «  'VERTICAL  BAND  SPLITTER  2  OR  3  SAW  EDGER  '/ 

24  C  *****  RE  AO  HEAOER  CARD  ***** 

25  READ (5,1)  (ST UO Y(I), 1*1, 3), NSEQ, (MCOOE ( J ) ,NBL ANK ( J ) , NCOOE ( J  ) , 

26  1  J*1,6),(XMCHN3(K),K*1,1$) 

27  1  F0RMAT(3A2,1X,I4,3X,6(1X,I3,A1,I1),15(A2)) 

28  C  *****  BEGIN  PAGE  ***** 

29  WR I TE (6 , 69 ) 

30  C  *****  TEST  FOR  TOO  many  MACHINES  ***** 

31  DO  2  K* 1  * 5 

32  IF (XMCHNS(K) .NE. ’  '  )C ALL  E RROR (01, NSEQ ) 

33  2  CONTINUE 

34  C  *****  TEST  FOR  CORRECT  FORMAT  •«*•• 

35  DO  4  J*  1 , 6 

36  IF(NBLANK(J).NE.'-'.AND.  NBLANK(J).NE. '  ’)CALL  ERROR ( 02 , NSEQ ) 

37  4  CONTINUE 

38  C  *****  READ  AND  PRINT  EACH  OATA  CARD  ••••• 

39  DO  38  11*1,1000 

«0  RE A0(5,5,END  =  40)  (STUDY (I ) , 1  *  1 , 3) ,NSEO, (MACH1N(1,1,K),CHAR(1,K), 

41  1  MACHINE  1,2, K),MACHIN (2, 1,K), CHAR (2,K),MACHIN( 2,2, K),«*l  ,6), 

42  2  length 

«3  5  FORMAT ( 3A 2, IX, 14, 6X, 6(12, At, H, lx, 12, At, II, |X), 13) 

0«  MR1TE(6,7)  (STUDY(I),I*1,3),NSEQ,(MACHIN(1,I,K),CHAR(1,A), 

45  1  MACH1N(1,2,K),HACHIN(2,!,K),CHAR(2,K),MACHIN(2,2,K),Ks|,6), 

46  2  LENGTH 

«7  7  FORMAT ( •  1 , 3A2, IX, I4,6X,6 ( 1 2, A1 , 1 1 , 1 X , 1 2, A 1 , 1 1 , 1 X ) , 1 3) 

48  C  *****  TEST  FOR  NO  GIVEN  LENGTH  ••••• 

49  IF(LENGTH.EQ.O)CALL  ERROR ( 03, NSEQ ) 

50  00  10  MM* |,6 

51  00  8  1*1,2 

52  C  *••••  ALLOW  FOR  DIMENSIONS  LARGER  THAN  •*••• 

53  C  *****  9  TO  USE  CHARACTER  COLUMN  ••*•• 

54  IF (CHAR (I,MM).EQ.'l' )MACHIN(I,2,mm)*machIN(I,2,mm)*10. 
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55  IF  (Ch»MI  ,MH).£Q.  •  1  •  )G0  TO  8 

56  C  *****  TEST  Fob  COBBECT  FORK*!  ***** 

57  IE (CHAR(  1 ,,  AM). N£. •  '.AND.CHAR(1,MM).NE.'/'.AND. 

58  J  CHAR ( J ,«*) .nE  .  •  .  '  )CAll  £RH0H(02,NSEQ) 

SB  8  CONTINUE 

60  C  *****  TEST  FOB  01HERSIONS  LARGER  THAN  ***** 

o ]  C  *****  20/4  RANDOM  THICKNESS  OB  18  INCH  ***** 

62  C  *****  SPECIFIED  THICKNESS  OB  WIDTH  ***** 

6  5  IF  (  (maCMM  1  ,  1  ,MH)  .GT  .20.0R.maCMIN(2, 1  ,mm)  .GT  .20)  .AND. 

64  1  (CHAP( l ,«*) .EQ. '✓ * .0B.CHAB(2,HH).E0. '/• ))  CALL  EBBOR(0«,NSEQ) 

6*  ]F  (  (MAC Hi  Nil, 1 ,HH).GT. 18. OR.haCh IN (2, 1  ,mm) .GT . 18) .and. 

66  2  (CmAB ( 1 ,MM) .EQ. >  • .0B.CHAB(2,HH) ,EO. '  '))  CALL  ERROR ( 04 , NSEQ ) 

67  C  *****  DETERMINE  WHETHER  SPECIFIED  OR  ***** 

68  C  *•**.  RANDOM  DIMENSIONS  ARE  USED  ***** 

6 B  IF  (CHAR { 1 ,MM) ,E0.  •  /  '  )  GO  TO  ?4 

70  IF (Char (2, MM) .EQ.  ' /•  )  GO  TO  ?s 

71  10  CONTINUE 

72  C  ••*••  TEST  FOR  ILLEGAL  DECIMAL  POINT  «•*•* 

75  DO  12  mms  1,6 

74  IF i CHAR  I  1 ,H») .EQ. • . • .OR.Cmab(2,mM)  ,EO. ' .  '  )  CALL  ERROR ( 05 # NSE Q ) 

75  12  CONTINUE 

7e  SP)=0 

77  SP2=G 

76  NT  =0 

74  C  *****  FINO  The  machine  NUMHER(S)  ***** 

60  c  ••*•«  and  each  DIMENSION  ***** 

81  C  •••*.  FOR  SPECIFIED  DIMENSIONS  ***** 

62  DO  20  kmsI.6 

65  PU  16  1=1,2 

6a  IF(SPl.NE.O)  NT  *  1 

85  Du  14  J= 1 , 2 

8b  IF(MACHIN(I, J,Km).NE.O)  GO  TO  16 

67  14  CONTINUE 

88  GO  TO  16 

8B  16  IF(NT.fO.O)  SP1=MACHIN(I,J,KH1 

BO  IF ( N 1 .£0.0)  M1*4M 

B  1  IF(NT.EO.l)  SP2*MACHIN( I ,J,KM) 

B?  IF (NT. 10.1)  h2*KM 

B5  IF (Nl  ,EU. 1 )  GO  TO  22 

B4  16  CONTINUE 

95  20  CONTINUE 

9b  C  •••«•  PROGRAM  SHOULO  NEVER  REACH  THIS  POINT  ••••• 

97  C  •*•••  AS  IT  SHOULD  have  TAKEN  The  GO  TO  2?  ••••* 

96  C  *****  whEN  IT  HAD  A  FULL  SET  OF  DATA  ***** 

99  CALL  E RPOP ( Ob.NSEQ) 

100  C  «••*•  calculate  THE  SURFACE.  AREA  ***** 

101  C  *****  FOB  Each  SPECIFIED  DIMENSION  ••••* 

102  22  S*BE  A ( m | , SP  I  ,  SP2)*S ARE  A (Ml ,SP1 ,SP2) AFLOAT (SP1)*Fl0AT (LENGTH) / 12 

1  05  5 ARE  A (M2,SP2,SP1)=SAREA(M2, SP2.SP1 ) AFLOAT (SP2)*FL0AT (LC  NGT  m ) / i £ 

104  SVOlUM(SPl ,*P2)*SV0LUM(SP1 ,SP2)aFL0AT(SP| *5P2*L£nGTH)/12. 

105  1*0  TO  58 

106  r.  *****  test  FOR  NO  THICKNESS  ***** 

107  C  ••*••  FOB  RANDOM  WIDTH  PBOOUCT  ***** 

106  24  IF (haCmIn< I , 1 ,mm) .£0.0)  CALL  ERROB(07,NS£0) 

109  PP*maCm1N{ 1 , 1 ,MM) 

110  GO  TO  26 

111  26  IF (maCm1N(2, I ,MM)  .£0.01  CALL  EBBOB(07,NSEO) 


1 1  ^ 

115 

26 

n« 

C 

115 

C 

116 

117 

1  Id 

119 

30 

120 

32 

121 

122 

34 

125 

C 

12a 

C 

125 

36 

126 

127 

12* 

129 

36 

1  SO 

C 

151 

C 

1  52 

C 

153 

4  0 

15a 

c 

l  55 

c 

1  56 

157 

13* 
l  $9 

140 

42 

141 

au 

142 

46 

1  4  3 

C 

144 

c 

145 

1  46 

147 

I4d 
]  49 

150 

151 

1  52 

4* 

tss 

SO 

t  S  4 

S2 

ISS 

c 

lS6 

c 

is; 

s« 

1S4 
l  S  9 

1  oO 

S6 

161 

s* 

162 

1  6  5 

c 

1  64 

c 

1  65 

1  66 

16? 

1  66 

U 

RPsMACHlN(2,t,HM) 

00  JO  RM*1,6 

*****  TEST  FOR  HISSING  DECIMAL  ON  WIOTH  ***** 
*****  FOR  RANDOM  WIDTH  PROOUCT  ***** 

IF (CHAR ( | ,RH) .EQ. ' • '  )  GO  TO  J2 
IF(CHAR(2,RM).£g.'.')  GO  TO  J« 

IFfRH.EO.6)  CALL  ERRORCOS.NSEO) 

continue 

hIOThsFLOAT (HACMINC I, 1,Rh))*PL0AT (M ACM  IN (I , 2 , RM ) ) / 1 0 . 

GO  TO  36 

-IOThsPLOAT  C*ACHIN(2f l ,RM) )*FL0AT(MACHIN(2,2,RM) )/I0. 

*****  TEST  FOR  UNACCEPTABLE  WIDTH  ***** 

••••*  FOR  RANDOM  WIDTH  PRODUCT  ***** 

nw 10** (D (H*  t  0 

IF(N«IO.LT.n  call  ERROR(09,N3EQ) 

9 ARE  a (RM,RP)sPAR£A (RM , RP ) ♦* IOTH*FLO A T (LENGTH)/ 12. 
WW0LUH(RP)sRV0L'JM(RP J ♦FL0AT(RP)/9.*w IDTH*FLOAT (LENGTH)/ 12. 
CONTINUE 

*****  IF  THE  STUOY  OOES  NOT  HAVE  ANY  ***** 

*****  SPECIFIED  DIMENSIONS#  THE  MULTIPLE  ***** 
••«*•  FACE  CALCULATION  IS  SKIPPEO.  ***** 

IF(SP1 .EO.O.AND.SP2.EQ.O)  GO  TO  54 

*****  CALCULATE  THE  TOTAL  SURFACE  AREA  ***** 

•  •••*  FOP  SPEC  IF IEO  DIMENSIONS  ***** 

00  a6  1*1  ,  1ft 
DO  44  Jsl , 1ft 
DO  42  K*l,6 

SMSU*( I . J )sSMSUM( I , J) *SARE A (K,  I  ,  J) 

CONTINUE 

CONTINUE 

CONTINUE 

*****  CALCULATE  surface  AREA  percentage  •••*• 
*****  FOP  SPEC  IF IEO  DIMENSIONS  ***** 

DO  52  1=1,6 
00  so  Jsl , 18 
DU  4ft  K  s 1 , 1  ft 

"SUMsSMSUM( J*K ) 

IF (MSUM.LE  .0)  GO  TO  4ft 

SPCT  (  I ,  J,W  )  =  SAREa(  I  ,  J,N  1*100.  /  (SMSUM  (  J,K  )  *S.NSUM(K  ,  J  )  ) 

IF (SPCT ( t  ,J,M  )  .GT.O.  I  SSKtP(I)*l 
CONTINUE 

COnT 1 nuE 

Cun  T I nuE 

••*••  CALCULATE  the  total  SURFACE  ARE*  ••*•• 
»•••*  for  RANDOM  «IOThS  ***** 

00  S»  Ni I , 2Q 
DO  St>  *  s  1  ,  6 

RH$ijM(s|lHMS<*,(N)*RAMEA(t*,N) 

COnT InuE 
CQNT InuF 
Oil  f>2  Nil, 20 

«**••  CALCij  *  T  t  SURFACE  art  A  PERCENTAGE  •«•*« 

•  •••*  FOX  «ANfU)M  ,  |  0  ThS  ***** 

hSum  =  R-,S"m  t  n  ) 
lFl*”‘j'"*,Lt.1))  1,0  TQ  6  2 

uO  Ml'  •  =  I  ,  o 

xxf  |  |.t\)sxARTA(H(N)*l<*0./RMS>|M(N) 


169  IF(RPCT(K,N).GT.O.)  RSKIP(K)xl 

170  60  CONTINUE 

1 7 »  62  CONTINUE 

172  00  bb  SPlsl/16 

173  00  64  SP2*  1»16 

170  T0TV0tsT0TV0Lt3V0LUM(SPl,SP2J 

175  6fl  CONTINUE 

176  66  CONTINUE 

177  00  08  WP* 1 , 20 

178  TOTVOL=TOTVOL*RVOLUM(RP) 

179  68  CONTINUE 

180  wRITE(6,69) 

181  C  *****  NEW  PAGE  ***** 

182  69  FORMAT (  '  1  •  ) 

183  C  *****  CALCULATE  ANO  PRINT  ***** 

16a  C  *****  PERCENT  OF  MILL  VOLUME  ***** 

185  C  *****  BY  PRODUCT  ***** 

1  So  wRITE(6,7!)  (3TU0Y(I),I*1,3) 

187  71  FORMAT (24X,3A2, ’  MACHINE  CONTRIBUTION  STUDY  '// 

183  1  20x, 'PRODUCT  PRODUCED' ,7X, 'PERCENT  MILL  VOLUME'/ 

189  2  20*,16('-'),7X,19('-')) 

190  C  *****  CALCULATE  PERCENT  OF  MILL  VOLUME  ***** 

191  C  *****  FOR  SPECIFIEO  OIMENSION  PROOUCTS  ***** 

192  00  76  Sp 1  *  1  »  t  8 

193  00  7a  SP2S  1,18 

194  IF(SPt .LE.SP2)PCTSVM(SPl,SP2)=(SV0LUM(SP2,3Pl)*3V0LUM(SPt*3P2)) 

IRS  1  /TOT  VOL  *100. 

t96  IF  (SP1  .GT.SP2)PCTSVM(SP2,SPl)  =  (SV0LUM(SP2,SPn*SV0LUM(SPl,SP2)  ) 

197  1  /TOTVOL*lOO. 

198  IF (SPt ,GT.SP2)G0  TO  74 

199  TOTPCTsT0TPCT*PCTSVM(SP1#SP2) 

20  0  IF  fPCrSvM(SPl,SP2).NE.0)WRITE(6,73)SPl,SP2#PCTSvM(SPl,SP2) 

201  73  F0RMAT(24K, 12* *  X  *, 12* l8X,Fb,2) 

202  74  CONTINUE 

203  76  CONTINUE 

204  C  *****  CALCULATE  PERCENT  OF  MILL  VOLUME  ***** 

205  C  *****  FOR  RANDOM  wJOTH  PROOUCTS  ***** 

206  DO  76  RPs 1  *  20 

207  PCTRvm(RP)sRvOLUM(RP) /TOT VOL *100. 

208  TOTPCT=TOTPCT*PCTRVM(RP) 

209  IF (PC THVM(RP) .NE.O) WRITE (6,77 )RP,PCTRVM(fiP) 

21  0  77  FORMAT (25X , 12,  '/4,,20X,F6»2) 

211  78  CONTINUE 

212  wRITE(b,79)T0TPCT 

21  3  79  Format (a8x  ,  '  - '/49X,F6.2,'  X  '//) 

214  DO  94  mn=1,6 

215  TOTCTPsrt. 

216  IF(SSKIP(Mn).NE.1.AN0.RSKIP(MNJ.NE.1)  GO  TO  94 

217  MMsMCOOf (mn) 

218  C  *****  PRINT  MACHINE  CONTRIBUTION  TABLE  ***** 

219  wRl TE (6#8t )  (SAws(I,mm),I*1,5) 

220  81  FORMAT ( • 1  • ///20X,  "*ACHlNEi  *,5(A6)//, 

221  l  5  < , 'DIMENSION  PRODUCEO' ,4X, 'PERCENT  SURFACE  AREA', 

222  2  4  * , 'PERCENT  CONTRIBUT ION ' /5x , 1 8 ('•'), 4X , 20 ('•'), 4X , 20 ('•' )) 

22  4  IF (S3* (P <mn  )  .NE . 1 )  GO  TO  90 

224  OU  Mr)  (Psl.lfl 

225  C  *****  PRINT  MACHINE  CONTRIBUTION  FOR  ***** 
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SPECIFIED  DIMENSION  PRODUCTS 


226 

227 

226 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 
234 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 
25  7 

258 

259 
2*0 


DO  66  JP*1'16 
MSKIP»SPCT(MN, IP, JP) 

IF(HSKIP.LE.O)  GO  TO  86 
ISAvsIP 
JSAVaJP 

IF(IP.GT.JP)  ISAVsJP 
IF(IP.GT.JP)  JS  A  V  *  I P 
IF( JP.GE.IP)CNTRIB*PCTSVM(IP, 

IF(1P.GT.JP)CNTRI0sPCTSVM(JP, 
rOTCT02TOTCT9*CNTRI0 
IF (JSAV.GE.lO.OR.JP.GE.lO)wRl 
i  SPCT(HN,IP,JP),CNTRI0 

83  F0RM4T(9X,I2, •  X  ',12#*  -  SI 

IF(JSAV.IT.10.ANO.JP.LT.10)WR 
1  SPCT(MN,IP,JP),CNTRI8 

85  FORMAT! 10X, II,  •  X  Ml,»  -  ', 

86  CONTINUE 

88  CONTINUE 

90  DO  92  Npx 1,20 

c  *****  PRINT  MACHINE  CONTRIBUTION  FOR  ***** 

c  *****  random  width  prooucts  ***** 

MSK IP*RPCT (mn,mp) 

IF(MSKIP.LE.O)  GO  TO  92 

C NTR I BaPC TR VM ( HP )*RPCI(MNf HP) *.01 

TOTCT02TOTCT0*CNTRI0 

MR1TE(6,91 )#Mp|RPCT (MN,MP)  ,CNTRIB 

91  FORMAT (1  OX, 12, V41 ,20X,F6.2, 17X,F6.2) 

92  CONTINUE 
wRITE(6,93)TOTCT0 

93  FORMAT (57X,9( •  •• )/27X, ’TOTAL  MACHINE  CON TR I 0u T ION • # 4 X , F6 . 2 , 1  X', 
l  ////✓) 

94  CONTINUE 

wR I TE ( * , 69 ) 

END 


JP 

)*SPCT(MN 

,ip» 

JP)*. 

01 

IP 

) *SPC  T (MN 

.ip. 

JP)*. 

01 

TE 

(6 , 83 ) ISA 

V, jsav.jp 

, 

2, 

1 3X , F6 . 2 , 

1  7X  . 

F6.2) 

I TE (6#  85 )  ISAV, 

JSAV. 

JP, 

It 

, 15X,F6.2 

,  17X 

.F6.2 

) 

i 


t 


1 

2 

3 

4 

5 

6 
7 
6 
9 

10 

11 

12 

13 

14 

15 

16 
17 
16 

19 

20 
21 


SUBROUTINE  ERROR (TYPE,NSEQ) 

INTEGER  TYPE 
WRI TE (6, 5 ) 

5  FORMAT ( • 0 ' ,6X , 1  TYPE  OF  ERROR:  •) 

GO  TO  (100,200, 300,400,500,600, 700, 800, 900), TYPE 
100  WRITE(6,10) 

10  F0RMAT('*',22X, •maximum  OF  *  MACHINES  EXCEEDED  ON  HEADER  CARD') 

GO  TO  1000 
200  MR I TE  (6,20) 

20  FORMAT( ,22X, »0AO  FORMAT  ON  CARD') 

GO  TO  1000 
300  *RITE(6,30) 

30  FORMAT ( ,22X, 'LENGTH  13  UNDEFINED') 

GO  TO  1000 
400  WRITE (6,40) 

40  FORMAT ( ,22X, 'MAXIMUM  BOARD  DIMENSION  EXCEEDED.') 

GO  TO  1000 
500  WRITE (6, 50 ) 

50  FORMAT! • ♦ • , 22x ' INTEGER  MUST  BE  USEO  FOR  A  STANDARD  DIMENSIONS  LOG1 
1) 

GO  TO  1000 


t  H 
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22 

600 

MRITE(6,60)  NSEQ 

23 

60 

F0RMAT('*',22X, 'UNABLE  TO  FIND  COMPLETE  DATA  ON  CARO*  SIB, 

24 

1  /,'  PROGRAM  TERMINATED.') 

25 

c**** 

2b 

STOP 

27 

c**** 

28 

700 

MRITE(6,70) 

29 

70 

FORMAT! ,22 X 'THICKNESS  IS  UNDEFINED  •) 

30 

GO  TO  1000 

31 

800 

NRI TE (6,80 ) 

32 

60 

F0RMAT('*',22X'A  DECIMAL  MUST  0E  IN  PROPER  POSITION  TO  INDICATE 

33 

1  'WHICH  MACHINE  IS  USED  TO  CUT  THE  NIDTH') 

34 

GO  TO  1000 

35 

*00 

NRI TE (6,90) 

36 

90 

F0RMAT('f',22X'THE  WIDTH  IS  TOO  SMALL') 

37 

GO  TO  1000 

38 

1000 

WRITE (6, till)  NSEQ 

39 

1111 

F0RMAT(6X, 'ERROR  0ETECTE0  AT  CARO  NUMBER  *',I8) 

40 

RETURN 

41 

END 

SA  1-2,  4-3 
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Procedure  and  Computer  Program  to  calculate  machine 
contribution  to  sawmill  recovery,  by  P.  H.  Steele, 
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The  importance  of  considering  individual  machine 
contribution  to  total  mill  efficiency  is  discussed,  and  a 
method  for  accurately  calculating  machine  contribution  is 
introduced  along  with  an  example  using  this  method.  Also 
presented  is  a  FORTRAN  computer  program  to  make  the 
necessary  calculations  automatically.  X 
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